(cons_to_long): Declare top, bot as Lisp_Object.

diff --git a/src/data.c b/src/data.c
index d9c905a6b0ef3ee706b9316ceed49d58606fba17..1121cb38ce005872134235a7db5a77e15f12fa2b 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -1480,7 +1480,7 @@ unsigned long
 cons_to_long (c)
      Lisp_Object c;
 {
-  int top, bot;
+  Lisp_Object top, bot;
   if (INTEGERP (c))
     return XINT (c);
   top = XCONS (c)->car;